Задание для самостоятельной работы 3.3 Работа с циклами

Подготовка:

• Создайте новый документ Word с именем C:\LabLoops.doc. Наберите в этом документе несколько предложений с текстом.
• Откройте редактор Visual Basic и создайте в этом документе новый стандартный модуль.

Задание 1:

Создайте в этом стандартном модуле процедуру ForNextSub(), которая бы выводила бы последовательно 10 окон сообщений с цифрами от 1 от 10.

Задание 2:

Создайте в этом программном модуле процедуру ForEachSub(), которая бы выводила в окна сообщений последовательно каждое слово в вашем документе LabLoops.

Коллекцию (массив) всех слов документа можно получить при помощи конструкции ThisDocument.Words. Значение каждого слова можно получить при помощи свойства Text элемента этой коллекции.

Получить этот учебник в формате PDF (Acrobat Reader) или DOC (Microsoft Word)